home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / eulisp / comp0_89.lha / Feel / Boot / CBoot / mod-hack.em < prev    next >
Encoding:
Text File  |  1993-02-02  |  479 b   |  27 lines
  1. ;; Eulisp Module
  2. ;; Author: pab
  3. ;; File: mod-hack.em
  4. ;; Date: Tue Dec 22 16:58:48 1992
  5. ;;
  6. ;; Project:
  7. ;; Description: 
  8. ;;
  9.  
  10. (defmodule mod-hack
  11.         (standard0
  12.          module-operators
  13.      root
  14.          )
  15.         ()
  16.     (defun add-load-path (x)
  17.       ((dynamic-access (get-module 'root) 'set-load-path) (cons x ((dynamic-access (get-module 'root) 'load-path)))))
  18.     
  19.     (export add-load-path)
  20.     
  21.     (defun xx-add-load-path (x)
  22.       nil)
  23.  
  24.     (export xx-add-load-path)
  25.       ;; end module
  26.       )
  27.